! Optional tags for Event Editing
! msg a number will offset that amount (0 if not a number)
if #opts[0]>0
  cell CreateLinkButton
  set image "plus" border shadowlesssquare
  set width 22 height 22
  ifNum #msg
    set Offset #msg
  endif
  help local("Click to attach optional data fields")

  repeat "#i",1,#opts[0]
    if #opts[#i]="_PNOTE"
      #plabel=local(#opts[#i])
      #pdist=local("Anyone")
      optionalTag #opts[#i],#plabel&" ("&#pdist&")",local(#opts[#i])
      #pdist=local("Family")
      optionalTag #opts[#i],#plabel&" ("&#pdist&")",local(#opts[#i]),"_DIST Family"
      #pdist=local("Owner")
      optionalTag #opts[#i],#plabel&" ("&#pdist&")",local(#opts[#i]),"_DIST Owner"
    else if #opts[#i]="_URL"
      optionalTag #opts[#i],local(#opts[#i]),""
    else
      optionalTag #opts[#i],local(#opts[#i]),local(#opts[#i])
    endif
  endrepeat
endif
